home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 1 / Cream of the Crop 1.iso / PROGRAM / DBVGAL17.ARJ / DEMOS.ARJ / L33.ASM < prev    next >
Assembly Source File  |  1992-01-25  |  2KB  |  67 lines
  1.         name    _L33set
  2.         ;   void L33set(void);
  3.         extrn   _EGA12set:FAR
  4. L33_TEXT       segment byte public 'CODE'
  5.         org     100h
  6.         assume  cs:L33_TEXT
  7. _L33set         proc    near
  8.         push    ds
  9.  
  10.         mov     ax,1202h        ; next scanline = 400
  11.         mov     bl,30h
  12.         int     10h
  13.         cmp     al,12h
  14.         jne     @out            ; VGA not active: bailout
  15.  
  16.         MOV     AX,0003         ; textmode 0x03
  17.         INT     10h      
  18.  
  19.         MOV     AX,1111h        ; 8x14 char set & video parameters
  20.         MOV     BL,00   
  21.         INT     10h      
  22.  
  23.         mov     dx,03d4h
  24.         mov     al,09h
  25.         out     dx,al
  26.         inc     dx
  27.         in      al,dx
  28.         and     al,0e0h
  29.         or      al,0bh
  30.         out     dx,al
  31.  
  32.         mov     dx,03d4h
  33.         mov     al,12h
  34.         out     dx,al
  35.         inc     dx
  36.         mov     al,8bh
  37.         out     dx,al
  38.  
  39.         XOR     AX,AX   
  40.         MOV     DS,AX   
  41.         MOV     AL,0ch   
  42.         MOV     ds:[0485h],AL           ; update BIOScrtpoints 
  43.         MOV     AL,20h
  44.         MOV     ds:[0484h],AL           ; update BIOScrtrows
  45.  
  46.         mov     ah,1
  47.         mov     ch,9
  48.         mov     cl,0bh
  49.         int     10h                     ; set cursor size
  50.  
  51.         mov     ax,seg _EGA12set
  52.         mov     es,ax
  53.         mov     bp,offset _EGA12set
  54.         mov     ax,1100h
  55.         mov     bx,0c00h
  56.         mov     cx,0100h
  57.         mov     dx,0
  58.         int     10h                    ; load custom character generator
  59. @out:
  60.         pop     ds
  61.         mov     ax,4c00h
  62.         int     21h
  63. _L33set         endp
  64. L33_TEXT        ends
  65.         end     _L33set
  66.  
  67.